home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 23 / Amiga Format AFCD23 (Feb 1998, Issue 107).iso / -in_the_mag- / emulation / computers / fmsx_1.4 / arexx / togglemode.fmsx < prev    next >
Text File  |  1997-12-12  |  410b  |  25 lines
  1. /*    This is an ARexx script for use with fMSX Amiga.
  2.  
  3.     $VER: togglemode.fmsx 1.4 (12.5.97)
  4.  
  5.     This script pauses fMSX if it is running or in music mode, and
  6.     runs it if is paused. Additionally it unlocks the drives when
  7.     paused so the Amiga can access the disks in them.
  8. */
  9.  
  10. options results
  11.  
  12. address FMSX.0
  13.  
  14. mode
  15.  
  16. if result = pause then do
  17.     mode run
  18.     lockdrives on
  19.     end
  20. else do
  21.     mode pause
  22.     lockdrives off
  23.     end
  24.  
  25.